home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 10 / FM Towns Free Software Collection 10.iso / fb386 / tool / watanabe / short / key_inp.bas < prev    next >
BASIC Source File  |  1994-06-07  |  154b  |  9 lines
  1. 10 CLS:MOUSE 0
  2. 20 A=&H600:STOP OFF
  3. 30 WHILE NOT(MOUSE(2,0))
  4. 40   LOCATE 0,0
  5. 50   PRINT USING "###########";INP(A,4)
  6. 60   K$=INKEY$
  7. 70 WEND
  8. 80 END
  9.